#!/usr/bin/perl 
#use warnings;
#use strict;

use Person;

$obj = new Person("truong", "xuan", 34948230423);

$obj->setFirstName("Nguyen");
